10 ;=====================¢15 ;--** SIO equates **--¢20 ;=====================¢25 DUNIT = $0301¢30 DCOMND = $0302¢35 DSTATS = $0303¢40 DBUFLO = $0304¢45 DBUFHI = $0305¢50 DTIMLO = $0306¢55 DBYTLO = $0308¢60 DBYTHI = $0309¢65 DAUX1 = $030A¢70 DAUX2 = $030B¢75 SIOV = $E459¢80 RUNAD = $02E0¢85 INITAD = $02E2¢90 HAPPY = 1 ;FIRST HAPPY¢95 ;=====================¢0100 ;¢0105 *= $6000¢0110 ;¢0115 RTS ;FOR SPARTA!¢0120 ;¢0125 START¢0130 LDX #0 ;SET-UP DCB¢0135 STX DSTATS¢0140 STX DBYTHI¢0145 STX DBUFHI¢0150 STX DAUX2¢0155 ;¢0160 INX ¢0165 STX DTIMLO¢0170 STX DBYTLO¢0175 STX DBUFLO¢0180 ;¢0185 LDA #$20¢0190 STA DAUX1¢0195 ;¢0200 LDA #$48 ;SET HAPPY (H)¢0205 STA DCOMND ;FAST-WRITE!¢0210 ;¢0215 SEND¢0220 LDA #HAPPY ;FIRST HAPPY¢0225 STA DUNIT ;DRIVE (D1:)¢0230 JSR SIOV¢0235 ;¢0240 BMI PAU ;END ON ERROR!¢0245 ;¢0250 INC SEND+1 ;LOOP FOR NEXT¢0255 BNE SEND ;DRIVE (D2:)...¢0260 ;¢0265 PAU RTS ;THE END!¢0270 ;¢0275 *= INITAD ;AUTO RUN ADDR¢0280 .WORD START¢0285 .END ¢0290 ;===============================¢0295 ;¢0300 ;This file will set the HAPPY¢0305 ;to FAST-WRITE (US-EMU) for use¢0310 ;with SpartaDOS! It sets all¢0315 ;contiguous drives starting from¢0320 ;D1: to fast-write!¢0325 ;¢0330 ;It should work for Rev.7¢0335 ;and higher HAPPY drives!¢0340 ;¢0345 ;(I'm not sure if it will work¢0350 ;with the older Rev.1 1050 ROM)¢0355 ;¢0360 ;Set it up as a *.COM file on¢0365 ;your SpartaDOS disks and call¢0370 ;it as part of the STARTUP.BAT¢0375 ;file, or name it AUTORUN.SYS!¢0380 ;¢0385 ;It will work with any DOS, but¢0390 ;it only sets the fast-buffered¢0395 ;write, NOT the high-speed SIO!¢0400 ;(See HAPPYX.ARC file for ULTRA-¢0405 ;SPEED SIO with most other DOS!)¢0410 ;¢0415 ;You may assemble this with the¢0420 ;MAC/65 by OSS - or the ATARI¢0425 ;ASSEMBLER/EDITOR cartridge.¢0430 ;¢0435 ;NOTE: You must ENTER it to the¢0440 ;editor (ENTER#D1:filename.ext)!¢0445 ;¢0450 ;If you are not using a HAPPY as¢0455 ;drive-1 (D1:), set HAPPY to the¢0460 ;drive number of the FIRST HAPPY¢0465 ;drive in your system and re-¢0470 ;assemble!¢0475 ;¢0480 ;This file saves you the trouble¢0485 ;of booting the HAPPY disk and¢0490 ;manually setting US-EMU mode,¢0495 ;then re-booting with SpartaDOS!¢0500 ;¢0505 ;That's it, for now!¢0510 ;¢0515 ;Aloha, from the HAPPY Hacker!¢0520 ;Tim Patrick, CIS #[73167,2611]¢0525 ;¢0530 ;ASM,,#D2:USHAPPY.OBJ¢0535 ;LIST #D2:USHAPPY.ASM¢ccccccccccccccccccccccccccccc
